ch      = 9
chance  = ch
bs      = 0.0001
nextbet = bs
b       = balance
a       = math.random(1,2)
if (a==1) then
bethigh = true
else
bethigh=false
end
d=0
c=0
v=1
e=0
f=0


function dobet()

    if (profit >= 1000) then stop() end

if win then

d=d+1
c=0
v=1
e=0
f=0
if d>10000 then
d=0

end
b=balance
a=math.random(1,2)
if a==1 then
bethigh=true
else
bethigh=false
end
chance=ch
nextbet=bs

else

e=e+1
d=d+1
b=b+bs
if a==2 then

if v==1 then
if e>0 then
c=c+1
if c>9 then
c=0
e=0
v=2
chance=ch*2
f=(b-balance)/3.99
if f<bs then
f=bs
end
nextbet=f
else
if lastBet.roll < ch*2 then
c=0
e=0
v=2
chance=ch*2
f=(b-balance)/3.99
if f<bs then
f=bs
end
nextbet=f
else
chance=ch
f=(b-balance)/8.99
if f<bs then
f=bs
end
nextbet=f
end
end
end
end

if v==2 then
if e>0 then
c=c+1
if c>9 then
c=0
e=0
v=3
chance=ch*4
f=(b-balance)/2.33
if f<bs then
f=bs
end
nextbet=f
else
if lastBet.roll < ch*4 then
c=0
e=0
v=3
chance=ch*4
f=(b-balance)/2.33
if f<bs then
f=bs
end
nextbet=f
else
chance=ch*2
f=(b-balance)/3.99
if f<bs then
f=bs
end
nextbet=f
end
end
end
end

if v==3 then
if e>0 then
c=c+1
if c>7 then
c=0
e=0
v=4
chance=ch*7
f=(b-balance)/1.497
if f<bs then
f=bs
end
nextbet=f
else
if lastBet.roll < ch*7 then
c=0
e=0
v=4
chance=ch*7
f=(b-balance)/1.497
if f<bs then
f=bs
end
nextbet=f
else
chance=ch*4
f=(b-balance)/2.33
if f<bs then
f=bs
end
nextbet=f
end
end
end
end

if v==4 then
if e>0 then
c=c+1
if c>5 then
c=0
e=0
v=5
chance=ch*8
f=(b-balance)/0.665 
if f<bs then
f=bs
end
nextbet=f
else
if lastBet.roll < ch*8 then
c=0
e=0
v=5
chance=ch*8
f=(b-balance)/0.665
if f<bs then
f=bs
end
nextbet=f
else
chance=ch*6
f=(b-balance)/1.497
if f<bs then
f=bs
end
nextbet=f
end
end
end
end

if v==5 then
if e>0 then
c=c+1
if c>2 then
c=0
e=0
v=6
chance=ch*8
f=(b-balance)/0.248
if f<bs then
f=bs
end
nextbet=f
else
if lastBet.roll < ch*8 then
c=0
e=0
v=6
chance=ch*8
f=(b-balance)/0.248
if f<bs then
f=bs
end
nextbet=f
else
chance=ch*4
f=(b-balance)/0.665
if f<bs then
f=bs
end
nextbet=f
end
end
end
end

if v==6 then
if e>0 then
e=0
v=1
chance=ch
f=(b-balance)/8.99
if f<bs then
f=bs
end
nextbet=f
end
end

else

if v==1 then
if e>0 then
c=c+1
if c>9 then
c=0
e=0
v=2
chance=ch*2
f=(b-balance)/3.99
if f<bs then
f=bs
end
nextbet=f
else
if lastBet.roll > ch*8 then
c=0
e=0
v=2
chance=ch*2
f=(b-balance)/3.99
if f<bs then
f=bs
end
nextbet=f
else
chance=ch
f=(b-balance)/8.99
if f<bs then
f=bs
end
nextbet=f
end
end
end
end

if v==2 then
if e>0 then
c=c+1
if c>9 then
c=0
e=0
v=3
chance=ch*4
f=(b-balance)/2.33
if f<bs then
f=bs
end
nextbet=f
else
if lastBet.roll > ch*5 then
c=0
e=0
v=3
chance=ch*6
f=(b-balance)/2.33
if f<bs then
f=bs
end
nextbet=f
else
chance=ch*2
f=(b-balance)/3.99
if f<bs then
f=bs
end
nextbet=f
end
end
end
end

if v==3 then
if e>0 then
c=c+1
if c>7 then
c=0
e=0
v=4
chance=ch*4
f=(b-balance)/1.497
if f<bs then
f=bs
end
nextbet=f
else
if lastBet.roll > ch*7 then
c=0
e=0
v=4
chance=ch*7
f=(b-balance)/1.497
if f<bs then
f=bs
end
nextbet=f
else
chance=ch*7
f=(b-balance)/2.33
if f<bs then
f=bs
end
nextbet=f
end
end
end
end

if v==4 then
if e>0 then
c=c+1
if c>5 then
c=0
e=0
v=5
chance=ch*7
f=(b-balance)/0.665 
if f<bs then
f=bs
end
nextbet=f
else
if lastBet.roll > ch*6 then
c=0
e=0
v=5
chance=ch*5
f=(b-balance)/0.665
if f<bs then
f=bs
end
nextbet=f
else
chance=ch*7
f=(b-balance)/1.497
if f<bs then
f=bs
end
nextbet=f
end
end
end
end

if v==5 then
if e>0 then
c=c+1
if c>2 then
c=0
e=0
v=6
chance=ch*8
f=(b-balance)/0.248
if f<bs then
f=bs
end
nextbet=f
else
if lastBet.roll > ch*8 then
c=0
e=0
v=6
chance=ch*8
f=(b-balance)/0.248
if f<bs then
f=bs
end
nextbet=f
else
chance=ch*7
f=(b-balance)/0.665
if f<bs then
f=bs
end
nextbet=f
end
end
end
end

if v==6 then
if e>0 then
e=0
v=1
chance=ch
f=(b-balance)/8.99
if f<bs then
f=bs
end
nextbet=f
end
end

end
end
end